home *** CD-ROM | disk | FTP | other *** search
/ The Atari Compendium / The Atari Compendium (Toad Computers) (1994).iso / files / prgtools / mint / lib / mlib36d.zoo / diffc next >
Encoding:
Text File  |  1993-09-22  |  45.2 KB  |  1,831 lines
  1. diff -cr ../mntlib35/Changelog ./Changelog
  2. *** ../mntlib35/Changelog    Mon Sep 13 07:21:28 1993
  3. --- ./Changelog    Wed Sep 22 15:06:46 1993
  4. ***************
  5. *** 4,9 ****
  6. --- 4,90 ----
  7.   Changes are listed in *reverse* order, most recent changes being
  8.   first.
  9.   
  10. + PATCHLEVEL36::
  11. + 
  12. + mincl:
  13. +     Added target for nlist.o.
  14. + mincl, sozobon/makefile, lattice/mincl.lcc, purec/mintlib.prj: ++entropy
  15. +     Added targets for truncate.o, wcmb.o, printf.o, vfprintf.o,
  16. +     vprintf.o.
  17. + truncate.c, types.h: ++schwab
  18. +     NEW file, implementation of truncate()/ftruncate().  Protos in
  19. +     types.h.
  20. + getwd.c: ++schwab
  21. +     Make getwd() return an error message in the buffer on failure.
  22. + _addsubs.cpp: ++nox
  23. +     Correct an inverted branch.
  24. + open.c: ++nox@jelal.north.de, ++entropy
  25. +     Fix so that when we use Fcreate() we then Fclose() and Fopen() the
  26. +     file, so we get sharing modes correct.
  27. + utime.c: ++schwab
  28. +     utime(NULL) uses time() to convert the current time to Unix format
  29. +     and immediately converts it back to GEMDOS format. Instead it should
  30. +     use the GEMDOS format directly.
  31. +     stime() must be changed because Tset{date,time} can now return a
  32. +     real error number. This depends on Tset{date,time} returning -1 if
  33. +     args are bad, which is true for all TOS versions, i think.
  34. + ttyname.c: ++schwab
  35. +     ttyname() should not return names starting with "u:" when _rootdir is
  36. +     'U', to be consistent with rest of library. find_ino now gets the
  37. +     dir name in gemdos format and it calls dos2unx on it.  ttyname.c
  38. +     unnecessarily depends on dirent.c, we know that Dreaddir works.  We
  39. +     can also avoid the hairy fstat(), since we know that Fcntl(FSTAT)
  40. +     works.
  41. + signal.c: ++schwab
  42. +     Pass through additional signal handler parameters via _trampoline().
  43. + rename.c: ++rwilhelm@physik.tu-muenchen.de
  44. +     Eliminate a useless strcmp().
  45. + main.c: ++schwab
  46. +     When converting a path variable from the environment, we can conserve
  47. +     memory by using the fact that _path_unx2dos enlarges the path by at
  48. +     most two times the number of elements. On the other hand, if there is
  49. +     no PCONVERT env var, the provided space was too small.
  50. + isatty.c: ++schwab
  51. +     Removes the dependency of isatty() on ttyname().
  52. + spawn.c: ++schwab
  53. +     Cleaned up the script emulation code, and changed it in that only
  54. +     files starting with "#!" are interpretable (as Unix does).  The
  55. +     first 1024 bytes of the file are examined when looking for
  56. +     interpreter and arguments.  A small bug is also corrected: errno
  57. +     should never be changed when there is no error.
  58. + falcon.h: ++Markus_Kilbinger@ac.maus.de
  59. +     Add two omitted backslashes to fix new trap definitions.
  60. + chmod.c: ++schwab@ls5.informatik.uni-dortmund.de
  61. +     chmod() unnecessarily calls stat() to check if the file is a
  62. +     directory; this information is already available through Fattrib().
  63. + nlist.c, nlist.h: ++shenson@nyx.cs.du.edu
  64. +     NEW files nlist.c, nlist.h.  A version of nlist() for mntlib/toslib.
  65. +     Works OK with my binary config program but your milage may vary.
  66. + wcmb.c, stdlib.h: ++pvt1-117@nada.kth.se
  67. +     NEW file wcmb.c for ANSI wide char functions.
  68. + waitpid.c: ++Robert.Wilhelm@Physik.TU-Muenchen.DE
  69. +     Add a forgotten patch for non-GCC compilers.
  70. + ctype.h: ++dsb@cs.duke.edu
  71. +     The toint() macro in ctype.h was translating hex digits wrong.
  72. + --begin jrb changes--
  73. + math-68881.h: ++jrb
  74. +     -- Put extern "C" around file when __cplusplus
  75. +     -- Make hypot use internal version of sqrt (because signature
  76. +        clash in libg++:xfix )
  77. +     -- Define internal version (_sqrt) of sqrt.
  78. + osbind.h: ++Robert.Wilhelm@Physik.TU-Muenchen.DE
  79. +     Changed addw #n,sp to lea n(s),sp which is 4 cycles shorter.
  80. + fprintf.c: ++jrb
  81. +     Break out vfprintf, printf and vprintf into their own .o's. That
  82. +     way the user can replace any of them.
  83. + printf.c, vfprintf.c, vprintf.c:: ++jrb
  84. +     NEW files.
  85. + mincl: ++jrb
  86. +     Add targets for above.
  87. + gnulib2.c: Steven Ourada (sourada@iastate.edu)
  88. +     #define WORD_BIG_ENDIAN for long long.
  89. + --end jrb changes--
  90. + 
  91.   PATCHLEVEL35::
  92.   
  93.   unx2dos.c: ++schwab
  94. ***************
  95. *** 84,90 ****
  96.       Add errors ENOTDIR and ELOOP.
  97.   signal.h: ++Ole_Arndt@f.maus.de (Ole Arndt)
  98.       Fix definition of _SIGSET_MAX_INDEX to correct several bugs
  99. !     in the POSIX signal mask functios.
  100.   stdio.h:
  101.       Add vsscanf() and _getbuf() protos (yech).
  102.   dirent.h:
  103. --- 165,171 ----
  104.       Add errors ENOTDIR and ELOOP.
  105.   signal.h: ++Ole_Arndt@f.maus.de (Ole Arndt)
  106.       Fix definition of _SIGSET_MAX_INDEX to correct several bugs
  107. !     in the POSIX signal mask functions.
  108.   stdio.h:
  109.       Add vsscanf() and _getbuf() protos (yech).
  110.   dirent.h:
  111. diff -cr ../mntlib35/Files ./Files
  112. *** ../mntlib35/Files    Sun Jul 18 09:03:42 1993
  113. --- ./Files    Tue Sep 21 20:34:36 1993
  114. ***************
  115. *** 8,18 ****
  116.   _cmpdf2.cpp    bcopy.cpp    fsetpos.c    memcmp.c    strftime.c
  117.   _cmpsf2.cpp    binmode.c    ftw.c        mktemp.c    stricmp.c
  118.   _divdf3.cpp    bsearch.c    fungetc.c    modf.cpp    strlen.c
  119. ! _divmods.s    bzero.cpp    fwrite.c            strlwr.c
  120.   _divsf3.cpp    calloc.c    gbl-ctors.h            strncat.c
  121.   _extends.cpp    chdir.c        getbuf.c    obstack.c    strncmp.c
  122.   _fixdfsi.cpp    chmod.c        getenv.c    perror.c    strncpy.c
  123.           ctermid.c    getlogin.c    pgrp.c
  124.   _fixsfsi.cpp    ctime.c        getopt.c    psignal.c    strnicmp.c
  125.   _fltsi.cpp    ctype.c        getpass.c    putenv.c    strpbrk.c
  126.   _fltsisf.cpp    cuserid.c    getpid.c    qsort.c        strrchr.c
  127. --- 8,19 ----
  128.   _cmpdf2.cpp    bcopy.cpp    fsetpos.c    memcmp.c    strftime.c
  129.   _cmpsf2.cpp    binmode.c    ftw.c        mktemp.c    stricmp.c
  130.   _divdf3.cpp    bsearch.c    fungetc.c    modf.cpp    strlen.c
  131. ! _divmods.s    bzero.cpp    fwrite.c    nlist.c        strlwr.c
  132.   _divsf3.cpp    calloc.c    gbl-ctors.h            strncat.c
  133.   _extends.cpp    chdir.c        getbuf.c    obstack.c    strncmp.c
  134.   _fixdfsi.cpp    chmod.c        getenv.c    perror.c    strncpy.c
  135.           ctermid.c    getlogin.c    pgrp.c
  136. +                         printf.c
  137.   _fixsfsi.cpp    ctime.c        getopt.c    psignal.c    strnicmp.c
  138.   _fltsi.cpp    ctype.c        getpass.c    putenv.c    strpbrk.c
  139.   _fltsisf.cpp    cuserid.c    getpid.c    qsort.c        strrchr.c
  140. ***************
  141. *** 34,42 ****
  142.   abs.c        findfile.c    ldexp.cpp    sprintf.c    toxxx.c
  143.   access.c    flonum.h    lib.h        stksiz.c    utime.c
  144.   alglobal.c    fopen.c        libgcc1.c    strcat.c
  145. !                 libgcc2.c
  146. ! alloca.cpp    fprintf.c    linea.c        strchr.c
  147. ! alphasor.c    fputc.c        localtim.c    strcmp.c
  148.                   longlong.h
  149.   
  150.   MiNT library:
  151. --- 35,43 ----
  152.   abs.c        findfile.c    ldexp.cpp    sprintf.c    toxxx.c
  153.   access.c    flonum.h    lib.h        stksiz.c    utime.c
  154.   alglobal.c    fopen.c        libgcc1.c    strcat.c
  155. !                 libgcc2.c            vfprintf.c
  156. ! alloca.cpp    fprintf.c    linea.c        strchr.c    vprintf.c
  157. ! alphasor.c    fputc.c        localtim.c    strcmp.c    wcmb.c
  158.                   longlong.h
  159.   
  160.   MiNT library:
  161. ***************
  162. *** 51,56 ****
  163. --- 52,58 ----
  164.   Makefile    getcwd.c            read.c        sysconf.c
  165.   OChangelog                    rename.c    thread.c
  166.   PatchLev.h    getdtabl.c    link.c        rmdir.c        times.c
  167. +                                 truncate.c
  168.   README        getgroup.c    lockf.c        scandir.c    ttyname.c
  169.   alarm.c        gethostn.c    main.c        scanf.c        uname.c
  170.   atexit.c    getpages.c            select.c    unlink.c
  171. diff -cr ../mntlib35/Makefile ./Makefile
  172. *** ../mntlib35/Makefile    Mon Sep 13 11:22:00 1993
  173. --- ./Makefile    Wed Sep 15 09:55:56 1993
  174. ***************
  175. *** 218,223 ****
  176. --- 218,224 ----
  177.       rm -f *.o *.olb *.tmp
  178.       rm -f core report nohup.out
  179.       rm -f foo bar baz
  180. +     rm -f *.target
  181.   
  182.   distclean: realclean
  183.       rm -f diffc diffh
  184. diff -cr ../mntlib35/PatchLev.h ./PatchLev.h
  185. *** ../mntlib35/PatchLev.h    Fri Jul  9 06:30:38 1993
  186. --- ./PatchLev.h    Wed Sep 15 09:51:26 1993
  187. ***************
  188. *** 3,6 ****
  189.    *    directory.
  190.    */
  191.   
  192. ! #define PatchLevel "35"
  193. --- 3,6 ----
  194.    *    directory.
  195.    */
  196.   
  197. ! #define PatchLevel "36"
  198. diff -cr ../mntlib35/_addsubs.cpp ./_addsubs.cpp
  199. *** ../mntlib35/_addsubs.cpp    Sun Jun  6 05:13:22 1993
  200. --- ./_addsubs.cpp    Tue Sep 21 13:53:32 1993
  201. ***************
  202. *** 83,89 ****
  203.       bclr    d3,d1        | kill sign bit u.exp
  204.       bclr    d3,d0        | kill sign bit u.exp
  205.       btst    d3,d2        | same sign for u and v?
  206. !     bne    0f
  207.       cmpl    d0,d1        | different signs - maybe x - x ?
  208.       seq    d2        | set 'cancellation' flag
  209.   0:
  210. --- 83,89 ----
  211.       bclr    d3,d1        | kill sign bit u.exp
  212.       bclr    d3,d0        | kill sign bit u.exp
  213.       btst    d3,d2        | same sign for u and v?
  214. !     beq    0f
  215.       cmpl    d0,d1        | different signs - maybe x - x ?
  216.       seq    d2        | set 'cancellation' flag
  217.   0:
  218. diff -cr ../mntlib35/chmod.c ./chmod.c
  219. *** ../mntlib35/chmod.c    Sat Jun 26 07:05:06 1993
  220. --- ./chmod.c    Tue Sep 21 09:42:20 1993
  221. ***************
  222. *** 19,25 ****
  223.   {
  224.          int  dosattrib = 0, r;
  225.          char path[PATH_MAX];
  226. -        struct stat stb;
  227.   
  228.          (void)_unx2dos(_path, path);
  229.   
  230. --- 19,24 ----
  231. ***************
  232. *** 33,42 ****
  233.       }
  234.   
  235.   /* The following lines ensure that the archive bit isn't cleared */
  236. !     r = Fattrib(path, 0, dosattrib);
  237. !      if (r > 0 && (r & FA_CHANGED))
  238.           dosattrib |= FA_CHANGED;
  239.   
  240.   #if 0
  241.          if (!(mode & S_IREAD))
  242.                  dosattrib |= FA_HIDDEN;
  243. --- 32,48 ----
  244.       }
  245.   
  246.   /* The following lines ensure that the archive bit isn't cleared */
  247. !     r = Fattrib(path, 0, 0);
  248. !     if (r < 0)
  249. !       {
  250. !         errno = -r;
  251. !         return -1;
  252. !       }
  253. !      if (r & FA_CHANGED)
  254.           dosattrib |= FA_CHANGED;
  255.   
  256. +     if (r & FA_DIR)
  257. +       dosattrib |= FA_DIR;
  258.   #if 0
  259.          if (!(mode & S_IREAD))
  260.                  dosattrib |= FA_HIDDEN;
  261. ***************
  262. *** 46,55 ****
  263.          r = Fattrib(path, 1, dosattrib);
  264.          if (r < 0) {
  265.   /* GEMDOS doesn't allow chmod on a directory, so pretend it worked */
  266. !                if (!stat(_path, &stb)) {
  267. !                 if ( (stb.st_mode & S_IFMT) == S_IFDIR )
  268. !             return 0;
  269. !                }
  270.                  errno = -r;
  271.                  return -1;
  272.          }
  273. --- 52,59 ----
  274.          r = Fattrib(path, 1, dosattrib);
  275.          if (r < 0) {
  276.   /* GEMDOS doesn't allow chmod on a directory, so pretend it worked */
  277. !         if (dosattrib & FA_DIR)
  278. !           return 0;
  279.                  errno = -r;
  280.                  return -1;
  281.          }
  282. Only in .: diffc
  283. diff -cr ../mntlib35/fprintf.c ./fprintf.c
  284. *** ../mntlib35/fprintf.c    Sat Sep  5 20:48:38 1992
  285. --- ./fprintf.c    Thu Sep 16 02:35:34 1993
  286. ***************
  287. *** 19,53 ****
  288.       va_end(args);
  289.       return r;
  290.   }
  291. - 
  292. - int
  293. - vfprintf(fp, fmt, args)
  294. -     FILE *fp;
  295. -     const char *fmt;
  296. -     va_list args;
  297. - {
  298. -     return(_doprnt(fp, fmt, args));
  299. - }
  300. - 
  301. - #if __STDC__
  302. - int printf(const char *fmt, ...)
  303. - #else
  304. - int printf(fmt) const char *fmt;
  305. - #endif
  306. - {
  307. -     va_list args;
  308. -     int r;
  309. - 
  310. -     va_start(args, fmt);
  311. -     r = _doprnt(stdout, fmt, args);
  312. -     va_end(args);
  313. -     return r;
  314. - }
  315. - 
  316. - int
  317. - vprintf(fmt, args)
  318. -     const char *fmt;
  319. -     va_list args;
  320. - {
  321. -     return(_doprnt(stdout, fmt, args));
  322. - }
  323. --- 19,21 ----
  324. diff -cr ../mntlib35/getcwd.c ./getcwd.c
  325. *** ../mntlib35/getcwd.c    Sun Jun 20 08:24:30 1993
  326. --- ./getcwd.c    Tue Sep 21 18:42:18 1993
  327. ***************
  328. *** 3,8 ****
  329. --- 3,9 ----
  330.   #include <stdlib.h>    /* both of these added for malloc() */
  331.   #include <limits.h>
  332.   #include <errno.h>
  333. + #include <string.h>
  334.   #include <osbind.h>
  335.   #include <mintbind.h>
  336.   #include <unistd.h>
  337. ***************
  338. *** 66,70 ****
  339.   char *getwd(buf)
  340.   char *buf;
  341.   {
  342. !     return getcwd(buf, PATH_MAX);
  343.   }
  344. --- 67,75 ----
  345.   char *getwd(buf)
  346.   char *buf;
  347.   {
  348. !   char *ret = getcwd(buf, PATH_MAX);
  349. !   if (ret)
  350. !     return ret;
  351. !   strcpy (buf, strerror (errno));
  352. !   return NULL;
  353.   }
  354. diff -cr ../mntlib35/gnulib2.c ./gnulib2.c
  355. *** ../mntlib35/gnulib2.c    Sat Dec 12 14:25:36 1992
  356. --- ./gnulib2.c    Thu Sep 16 18:00:24 1993
  357. ***************
  358. *** 88,94 ****
  359.   /* Define this if most significant word of a multiword number is numbered.  */
  360.   /* For 68000 we can decide arbitrarily
  361.      since there are no machine instructions for them.  */
  362. ! /* #define WORDS_BIG_ENDIAN */
  363.   
  364.   /* number of bits in an addressible storage unit */
  365.   #define BITS_PER_UNIT 8
  366. --- 88,94 ----
  367.   /* Define this if most significant word of a multiword number is numbered.  */
  368.   /* For 68000 we can decide arbitrarily
  369.      since there are no machine instructions for them.  */
  370. ! #define WORDS_BIG_ENDIAN
  371.   
  372.   /* number of bits in an addressible storage unit */
  373.   #define BITS_PER_UNIT 8
  374. diff -cr ../mntlib35/isatty.c ./isatty.c
  375. *** ../mntlib35/isatty.c    Tue Jun 22 03:21:26 1993
  376. --- ./isatty.c    Tue Sep 21 09:54:16 1993
  377. ***************
  378. *** 51,58 ****
  379. --- 51,60 ----
  380.   _isctty(fd)
  381.     int fd;
  382.   {
  383. + #if 0
  384.     char ctty_name[L_ctermid];
  385.     char ftty_name[L_ctermid];
  386. + #endif
  387.     struct stat st, tt;
  388.     extern int __mint;
  389.   
  390. ***************
  391. *** 67,74 ****
  392.       */
  393.       return (st.st_dev == tt.st_dev && st.st_ino == tt.st_ino);
  394.     }
  395. ! #endif
  396.     (void) ctermid(ctty_name);
  397.     (void) strncpy(ftty_name, ttyname(fd), L_ctermid);
  398.     return !(strncmp(ctty_name, ftty_name, L_ctermid));
  399.   }
  400. --- 69,81 ----
  401.       */
  402.       return (st.st_dev == tt.st_dev && st.st_ino == tt.st_ino);
  403.     }
  404. !   /* We know that __mint < 9 (the Fcntl's above don't have the chance
  405. !      to fail), use the same algorithm that ttyname() uses in this
  406. !      case: it returns "/dev/aux" if fd == -2 */
  407. !   return fd != -2;
  408. ! #else
  409.     (void) ctermid(ctty_name);
  410.     (void) strncpy(ftty_name, ttyname(fd), L_ctermid);
  411.     return !(strncmp(ctty_name, ftty_name, L_ctermid));
  412. + #endif
  413.   }
  414. diff -cr ../mntlib35/lattice/mincl.lcc ./lattice/mincl.lcc
  415. *** ../mntlib35/lattice/mincl.lcc    Mon Feb 22 09:44:02 1993
  416. --- ./lattice/mincl.lcc    Wed Sep 22 15:00:40 1993
  417. ***************
  418. *** 21,27 ****
  419.       heapbase.o ident.o il.o ic.o iw.o ig.o ip.o inistack.o \
  420.       ioctl.o isatty.o kill.o killpg.o link.o localtim.o lockf.o lseek.o ltoa.o \
  421.       main.o malloc.o memccpy.o memchr.o memcmp.o memcpy.o memset.o mkdir.o \
  422. !     mknod.o mktemp.o nice.o open.o pause.o perror.o pipe.o popen.o \
  423.       psignal.o putenv.o qsort.o raise.o rand.o random.o read.o realloc.o \
  424.       regexp.o regsup.o \
  425.       rename.o rmdir.o sbrk.o scandir.o scanf.o select.o setbuf.o setlocal.o \
  426. --- 21,27 ----
  427.       heapbase.o ident.o il.o ic.o iw.o ig.o ip.o inistack.o \
  428.       ioctl.o isatty.o kill.o killpg.o link.o localtim.o lockf.o lseek.o ltoa.o \
  429.       main.o malloc.o memccpy.o memchr.o memcmp.o memcpy.o memset.o mkdir.o \
  430. !     mknod.o mktemp.o nice.o open.o pause.o perror.o pipe.o popen.o printf.o \
  431.       psignal.o putenv.o qsort.o raise.o rand.o random.o read.o realloc.o \
  432.       regexp.o regsup.o \
  433.       rename.o rmdir.o sbrk.o scandir.o scanf.o select.o setbuf.o setlocal.o \
  434. ***************
  435. *** 31,40 ****
  436.       strerror.o strftime.o strlen.o stricmp.o strlwr.o strncat.o strncmp.o \
  437.       strncpy.o strnicmp.o strpbrk.o strrchr.o strrev.o strspn.o strstr.o strtok.o \
  438.       strtol.o strtoul.o strupr.o symlink.o sysconf.o system.o sysvar.o textio.o thread.o \
  439. !     time.o timeoday.o times.o tmpfile.o tmpnam.o ttyname.o uname.o \
  440.       unlink.o unx2dos.o utime.o utmp.o wait.o wait3.o waitpid.o write.o wtmp.o \
  441.       _divmods.o _mulsi3.o _udivmod.o _umulsi3.o bcopy.o linea.o osbind.o \
  442. !     setjmp.o vfork.o
  443.   
  444.   all:    $(ALL)
  445.   
  446. --- 31,40 ----
  447.       strerror.o strftime.o strlen.o stricmp.o strlwr.o strncat.o strncmp.o \
  448.       strncpy.o strnicmp.o strpbrk.o strrchr.o strrev.o strspn.o strstr.o strtok.o \
  449.       strtol.o strtoul.o strupr.o symlink.o sysconf.o system.o sysvar.o textio.o thread.o \
  450. !     time.o timeoday.o times.o tmpfile.o tmpnam.o truncate.o ttyname.o uname.o \
  451.       unlink.o unx2dos.o utime.o utmp.o wait.o wait3.o waitpid.o write.o wtmp.o \
  452.       _divmods.o _mulsi3.o _udivmod.o _umulsi3.o bcopy.o linea.o osbind.o \
  453. !     setjmp.o vfork.o vfprintf.o vprintf.o wcmb.o
  454.   
  455.   all:    $(ALL)
  456.   
  457. Only in ../mntlib35: lblong.target
  458. diff -cr ../mntlib35/main.c ./main.c
  459. *** ../mntlib35/main.c    Sun Sep 12 20:16:28 1993
  460. --- ./main.c    Tue Sep 21 09:56:28 1993
  461. ***************
  462. *** 204,210 ****
  463.                               cnt++;
  464.                           tmp++;
  465.                       }
  466. !                     _envp[i] = (char *) malloc(cnt * MAXPATHLEN);
  467.                       strncpy(_envp[i], s, len);
  468.                       _path_dos2unx(s + len, _envp[i] + len);
  469.                       _envp[i] = (char *) realloc(_envp[i], 
  470. --- 204,210 ----
  471.                               cnt++;
  472.                           tmp++;
  473.                       }
  474. !                     _envp[i] = (char *) malloc(tmp - s + cnt * 2);
  475.                       strncpy(_envp[i], s, len);
  476.                       _path_dos2unx(s + len, _envp[i] + len);
  477.                       _envp[i] = (char *) realloc(_envp[i], 
  478. ***************
  479. *** 223,229 ****
  480.               if (s[0] == 'P' && s[1] == 'A' && s[2] == 'T' &&
  481.                   s[3] == 'H' && s[4] == '=')
  482.               {
  483. !                 _envp[i] = (char *) malloc(5 + MAXPATHLEN);
  484.                   strncpy(_envp[i], s, 5);
  485.                   _path_dos2unx(s + 5, _envp[i] + 5);
  486.                   _envp[i] = (char *) realloc(_envp[i], 
  487. --- 223,238 ----
  488.               if (s[0] == 'P' && s[1] == 'A' && s[2] == 'T' &&
  489.                   s[3] == 'H' && s[4] == '=')
  490.               {
  491. !                 tmp = s + 5; /* tmp now after '=' */    
  492. !                 cnt = 1;
  493. !                 while (*tmp)
  494. !                   {
  495. !                     /* count words */
  496. !                     if (*tmp == ';' || *tmp == ',')
  497. !                       cnt++;
  498. !                     tmp++;
  499. !                   }
  500. !                 _envp[i] = (char *) malloc(tmp - s + cnt * 2);
  501.                   strncpy(_envp[i], s, 5);
  502.                   _path_dos2unx(s + 5, _envp[i] + 5);
  503.                   _envp[i] = (char *) realloc(_envp[i], 
  504. diff -cr ../mntlib35/mincl ./mincl
  505. *** ../mntlib35/mincl    Sun Jul 18 08:48:18 1993
  506. --- ./mincl    Tue Sep 21 20:38:20 1993
  507. ***************
  508. *** 27,33 ****
  509.       calloc.o clock.o ctime.o ctype.o difftime.o \
  510.       fopen.o fclose.o fdopen.o fflush.o fgetc.o fgets.o \
  511.       fputc.o fputs.o fread.o fwrite.o fseek.o fsetpos.o \
  512. !     eprintf.o fprintf.o sprintf.o \
  513.       fscanf.o scanf.o sscanf.o \
  514.       getenv.o gets.o getw.o localtim.o \
  515.       malloc.o qsort.o raise.o rand.o realloc.o \
  516. --- 27,33 ----
  517.       calloc.o clock.o ctime.o ctype.o difftime.o \
  518.       fopen.o fclose.o fdopen.o fflush.o fgetc.o fgets.o \
  519.       fputc.o fputs.o fread.o fwrite.o fseek.o fsetpos.o \
  520. !     fprintf.o vfprintf.o printf.o vprintf.o eprintf.o sprintf.o \
  521.       fscanf.o scanf.o sscanf.o \
  522.       getenv.o gets.o getw.o localtim.o \
  523.       malloc.o qsort.o raise.o rand.o realloc.o \
  524. ***************
  525. *** 35,52 ****
  526.       setlocal.o strftime.o strtol.o system.o \
  527.       tmpnam.o tmpfile.o \
  528.       ltoa.o main.o doprnt.o div.o \
  529. !     strtoul.o fungetc.o filbuf.o getbuf.o toxxx.o
  530.   
  531.   #
  532.   # other miscellaneous stuff
  533.   PORT =  a64l.o alphasor.o abs.o ctermid.o cuserid.o \
  534. !     ffs.o findfile.o fopenp.o frwbin.o \
  535. !     ftw.o getpw.o gethostn.o \
  536. !     getlogin.o getopt.o getpages.o getpass.o grp.o ident.o mktemp.o \
  537. !     regexp.o regsup.o scandir.o strlwr.o strupr.o strrev.o sync.o \
  538. !     textio.o random.o \
  539. !     obstack.o utmp.o wtmp.o \
  540. !     il.o ic.o iw.o ig.o ip.o
  541.   
  542.   #
  543.   # the string library
  544. --- 35,53 ----
  545.       setlocal.o strftime.o strtol.o system.o \
  546.       tmpnam.o tmpfile.o \
  547.       ltoa.o main.o doprnt.o div.o \
  548. !     strtoul.o fungetc.o filbuf.o getbuf.o toxxx.o wcmb.o
  549.   
  550.   #
  551.   # other miscellaneous stuff
  552.   PORT =  a64l.o alphasor.o abs.o ctermid.o cuserid.o \
  553. !     ffs.o findfile.o fopenp.o frwbin.o ftw.o \
  554. !     gethostn.o getlogin.o getopt.o getpages.o getpass.o getpw.o grp.o \
  555. !     ic.o ig.o il.o ip.o iw.o \
  556. !     ident.o mktemp.o nlist.o obstack.o\
  557. !     random.o regexp.o regsup.o \
  558. !     scandir.o strlwr.o strupr.o strrev.o sync.o \
  559. !     textio.o truncate.o \
  560. !     utmp.o wtmp.o
  561.   
  562.   #
  563.   # the string library
  564. Only in .: nlist.c
  565. diff -cr ../mntlib35/open.c ./open.c
  566. *** ../mntlib35/open.c    Thu Jul 15 08:12:26 1993
  567. --- ./open.c    Tue Sep 21 13:45:42 1993
  568. ***************
  569. *** 94,110 ****
  570.               errno = EEXIST;
  571.               return -1;
  572.           }
  573. !         if(iomode & O_TRUNC)
  574.               rv = (int)Fcreate(filename, 0x00);
  575. !         else
  576. !             rv = (int)Fopen(filename,iomode & modemask);
  577.       }
  578.       else                    /* file doesn't exist */
  579.       {
  580.           if(iomode & O_CREAT) {
  581.               rv = (int)Fcreate(filename, 0x00);
  582. !             if (rv >= 0 && __mint >= 9)
  583. !                 (void)Fchmod(filename, pmode);
  584.           }
  585.           else
  586.               rv = -ENOENT;
  587. --- 94,121 ----
  588.               errno = EEXIST;
  589.               return -1;
  590.           }
  591. !         if(iomode & O_TRUNC) {
  592.               rv = (int)Fcreate(filename, 0x00);
  593. !             if (rv >= 0) {
  594. !                 (void)Fclose(rv);
  595. !             }
  596. !             else {
  597. !                 errno = -rv;
  598. !                 return -1;
  599. !             }
  600. !         }
  601. !         rv = (int)Fopen(filename,iomode & modemask);
  602.       }
  603.       else                    /* file doesn't exist */
  604.       {
  605.           if(iomode & O_CREAT) {
  606.               rv = (int)Fcreate(filename, 0x00);
  607. !             if (rv >= 0) {
  608. !                 (void)Fclose(rv);
  609. !                 rv = (int)Fopen(filename,iomode & modemask);
  610. !                 if (rv >= 0 && __mint >= 9)
  611. !                     (void)Fchmod(filename, pmode);
  612. !             }
  613.           }
  614.           else
  615.               rv = -ENOENT;
  616. Only in .: printf.c
  617. diff -cr ../mntlib35/purec/mintlib.prj ./purec/mintlib.prj
  618. *** ../mntlib35/purec/mintlib.prj    Fri Jun 11 05:11:00 1993
  619. --- ./purec/mintlib.prj    Wed Sep 22 15:04:44 1993
  620. ***************
  621. *** 117,122 ****
  622. --- 117,123 ----
  623.   ..\pipe.c
  624.   ..\pgrp.c
  625.   ..\popen.c
  626. + ..\printf.c
  627.   ..\psignal.c
  628.   ..\putenv.c
  629.   ..\qsort.c [-S -T]
  630. ***************
  631. *** 188,193 ****
  632. --- 189,195 ----
  633.   ..\tmpfile.c
  634.   ..\tmpnam.c
  635.   ..\toxxx.c
  636. + ..\truncate.c
  637.   ..\ttyname.c
  638.   ..\uname.c
  639.   ..\unlink.c
  640. ***************
  641. *** 194,202 ****
  642. --- 196,207 ----
  643.   ..\unx2dos.c
  644.   ..\utime.c
  645.   ..\utmp.c
  646. + ..\vfprintf.c
  647. + ..\vprintf.c
  648.   ..\wait.c
  649.   ..\wait3.c
  650.   ..\waitpid.c
  651. + ..\wcmb.c
  652.   ..\write.c
  653.   ..\wtmp.c
  654.   
  655. diff -cr ../mntlib35/rename.c ./rename.c
  656. *** ../mntlib35/rename.c    Sun Oct 20 02:16:02 1991
  657. --- ./rename.c    Tue Sep 21 09:59:44 1993
  658. ***************
  659. *** 12,22 ****
  660.   {
  661.       char oldname[PATH_MAX], newname[PATH_MAX];
  662.       int rval;
  663. ! 
  664.       if (!strcmp(_oldname, _newname)) {
  665.           rval = 0;    /* no-op */
  666.       }
  667. ! 
  668.       if (!access(_newname, 0)) {    /* new name already exists */
  669.           if (unlink(_newname))
  670.               return -1;
  671. --- 12,22 ----
  672.   {
  673.       char oldname[PATH_MAX], newname[PATH_MAX];
  674.       int rval;
  675. ! #if 0
  676.       if (!strcmp(_oldname, _newname)) {
  677.           rval = 0;    /* no-op */
  678.       }
  679. ! #endif
  680.       if (!access(_newname, 0)) {    /* new name already exists */
  681.           if (unlink(_newname))
  682.               return -1;
  683. diff -cr ../mntlib35/sigactio.c ./sigactio.c
  684. *** ../mntlib35/sigactio.c    Sun Jul 18 08:20:38 1993
  685. --- ./sigactio.c    Tue Sep 21 10:02:28 1993
  686. ***************
  687. *** 9,16 ****
  688.   extern __Sigfunc _sig_handler[__NSIG];
  689.   
  690.   #ifdef __MSHORT__
  691. ! typedef void __CDECL (*__KerSigfunc) __PROTO((long));
  692. ! __EXTERN void __CDECL _trampoline __PROTO((long sig));
  693.   #else
  694.   typedef void __CDECL (*__KerSigfunc) __PROTO((int));
  695.   #endif
  696. --- 9,16 ----
  697.   extern __Sigfunc _sig_handler[__NSIG];
  698.   
  699.   #ifdef __MSHORT__
  700. ! typedef void __CDECL (*__KerSigfunc) __PROTO((long, long));
  701. ! __EXTERN void __CDECL _trampoline __PROTO((long sig, long code));
  702.   #else
  703.   typedef void __CDECL (*__KerSigfunc) __PROTO((int));
  704.   #endif
  705. diff -cr ../mntlib35/signal.c ./signal.c
  706. *** ../mntlib35/signal.c    Sat Sep  5 22:00:40 1992
  707. --- ./signal.c    Tue Sep 21 10:02:32 1993
  708. ***************
  709. *** 22,41 ****
  710.    * we previously established
  711.    */
  712.   
  713. ! void __CDECL _trampoline __PROTO((long));
  714.   
  715.   /* the argument is on the stack */
  716. ! void __CDECL _trampoline(sig)
  717. !     long sig;
  718.   {
  719. !     __Sigfunc func;
  720.   
  721. !     func = _sig_handler[sig];
  722.   
  723.   /* note: func should never be SIG_IGN or SIG_DFL; if it is, something
  724.    * really bad happened and we want to crash anyway!
  725.    */
  726. !     (*func)((short)sig);
  727.   }
  728.   #endif
  729.   
  730. --- 22,41 ----
  731.    * we previously established
  732.    */
  733.   
  734. ! void __CDECL _trampoline __PROTO((long, long));
  735.   
  736.   /* the argument is on the stack */
  737. ! void __CDECL _trampoline(sig, code)
  738. !     long sig, code;
  739.   {
  740. !     void (*func) __PROTO ((int, int));
  741.   
  742. !     func = (void (*) __PROTO ((int, int))) _sig_handler[sig];
  743.   
  744.   /* note: func should never be SIG_IGN or SIG_DFL; if it is, something
  745.    * really bad happened and we want to crash anyway!
  746.    */
  747. !     (*func)((int)sig, (int) code);
  748.   }
  749.   #endif
  750.   
  751. diff -cr ../mntlib35/sozobon/makefile ./sozobon/makefile
  752. *** ../mntlib35/sozobon/makefile    Mon Sep 13 06:18:44 1993
  753. --- ./sozobon/makefile    Wed Sep 22 14:54:38 1993
  754. ***************
  755. *** 47,60 ****
  756.   
  757.   # These are in alphabetical order to make it easy to find one.
  758.   OBJECTS = \
  759. !     abort.o abs.o access.o alarm.o alloca.o alphasor.o \
  760.       atexit.o atol.o \
  761.       bcmp.o bcopy.o binmode.o bsearch.o bzero.o \
  762.       calloc.o chdir.o chmod.o clock.o close.o console.o crtinit.o \
  763. !     ctermid.o ctime.o ctype.o cuserid.o\
  764.       defmode.o difftime.o dirent.o doprnt.o dup.o \
  765.       eprintf.o exec.o execp.o\
  766. !     fclose.o fcntl.o fdopen.o fflush.o ffs.o fgetc.o fgets.o filbuf.o \
  767.       findfile.o fopen.o fopenp.o fork.o fprintf.o fputc.o fputs.o \
  768.       fread.o frwbin.o fscanf.o fseek.o fsetpos.o ftw.o fungetc.o \
  769.       fwrite.o \
  770. --- 47,60 ----
  771.   
  772.   # These are in alphabetical order to make it easy to find one.
  773.   OBJECTS = \
  774. !     abort.o abs.o access.o alarm.o alloca.o alphasor.o \
  775.       atexit.o atol.o \
  776.       bcmp.o bcopy.o binmode.o bsearch.o bzero.o \
  777.       calloc.o chdir.o chmod.o clock.o close.o console.o crtinit.o \
  778. !     ctermid.o ctime.o ctype.o cuserid.o \
  779.       defmode.o difftime.o dirent.o doprnt.o dup.o \
  780.       eprintf.o exec.o execp.o\
  781. !     fclose.o fcntl.o fdopen.o fflush.o ffs.o fgetc.o fgets.o filbuf.o \
  782.       findfile.o fopen.o fopenp.o fork.o fprintf.o fputc.o fputs.o \
  783.       fread.o frwbin.o fscanf.o fseek.o fsetpos.o ftw.o fungetc.o \
  784.       fwrite.o \
  785. ***************
  786. *** 70,76 ****
  787.       mktemp.o \
  788.       nice.o \
  789.       obstack.o open.o osbind.o \
  790. !     pause.o perror.o pgrp.o pipe.o popen.o psignal.o putenv.o \
  791.       qsort.o \
  792.       raise.o rand.o random.o read.o realloc.o regexp.o regsup.o \
  793.       rename.o rmdir.o \
  794. --- 70,76 ----
  795.       mktemp.o \
  796.       nice.o \
  797.       obstack.o open.o osbind.o \
  798. !     pause.o perror.o pgrp.o pipe.o popen.o printf.o psignal.o putenv.o \
  799.       qsort.o \
  800.       raise.o rand.o random.o read.o realloc.o regexp.o regsup.o \
  801.       rename.o rmdir.o \
  802. ***************
  803. *** 84,93 ****
  804.       strspn.o strstr.o strtok.o strtol.o strtoul.o strupr.o symlink.o \
  805.       sysconf.o system.o sysvar.o \
  806.       textio.o thread.o time.o timeoday.o times.o tmpfile.o tmpnam.o \
  807. !     toxxx.o ttyname.o \
  808.       uname.o unlink.o unx2dos.o utime.o utmp.o \
  809. !     vfork.o \
  810. !     wait.o wait3.o waitpid.o write.o wtmp.o
  811.   
  812.   # Rule to handle .cpp files
  813.   .SUFFIXES: .cpp
  814. --- 84,93 ----
  815.       strspn.o strstr.o strtok.o strtol.o strtoul.o strupr.o symlink.o \
  816.       sysconf.o system.o sysvar.o \
  817.       textio.o thread.o time.o timeoday.o times.o tmpfile.o tmpnam.o \
  818. !     toxxx.o truncate.o ttyname.o \
  819.       uname.o unlink.o unx2dos.o utime.o utmp.o \
  820. !     vfork.o vfprintf.o vprintf.o \
  821. !     wait.o wait3.o waitpid.o wcmb.o write.o wtmp.o
  822.   
  823.   # Rule to handle .cpp files
  824.   .SUFFIXES: .cpp
  825. diff -cr ../mntlib35/spawn.c ./spawn.c
  826. *** ../mntlib35/spawn.c    Mon Sep 13 22:59:12 1993
  827. --- ./spawn.c    Tue Sep 21 09:50:36 1993
  828. ***************
  829. *** 29,34 ****
  830. --- 29,39 ----
  831.      using /bin/sh
  832.      Files which have i.e '#!/usr/bin/awk -f' as their first character
  833.      are interpreted with "/usr/bin/awk -f <file>"
  834. + 
  835. +    17 Sep 1993 schwab
  836. +    cleaned up emulation code for script execution.
  837. +    File is only interpretable if first two bytes are "#!".
  838. +    Don't modify errno if there is no error.
  839.   */
  840.   
  841.   #include    <stdarg.h>
  842. ***************
  843. *** 54,74 ****
  844.   
  845.   #ifdef HASH_BANG
  846.   
  847. ! static char *extensions[] = { "ttp", "prg", "tos", NULL };
  848.   
  849. ! static int interpret_script __PROTO((int mode, char *path, 
  850. !                     char **argv, char **envp));
  851.   
  852.   static int
  853.   interpret_script(mode, path, argv, envp)
  854.       int        mode;
  855. !     char    *path;
  856. !     char    **argv;
  857. !     char    **envp;
  858.   {
  859. -     char    shellpath[MAXPATHLEN];
  860.       char    tmppath[MAXPATHLEN];
  861. -     char    args[TOS_ARGS + 1];
  862.       char    *shell;
  863.       char    *shellargs;
  864.       char    **shellargv;
  865. --- 59,77 ----
  866.   
  867.   #ifdef HASH_BANG
  868.   
  869. ! static char *const extensions[] = { "ttp", "prg", "tos", NULL };
  870.   
  871. ! static int interpret_script __PROTO((int mode, const char *path, 
  872. !                     char *const *argv, char *const *envp));
  873.   
  874.   static int
  875.   interpret_script(mode, path, argv, envp)
  876.       int        mode;
  877. !     const char *path;
  878. !     char    *const *argv;
  879. !     char    *const *envp;
  880.   {
  881.       char    tmppath[MAXPATHLEN];
  882.       char    *shell;
  883.       char    *shellargs;
  884.       char    **shellargv;
  885. ***************
  886. *** 76,199 ****
  887.       int        fd;
  888.       int        argcount;
  889.       int        i, rv;
  890. !     char    buf;
  891. !     
  892.       /* path is already converted to dos */
  893.       if ((fd = (int)Fopen(path, 0)) < 0)
  894. !         return -fd;
  895. ! 
  896. !     if (Fread(fd, 1L, &buf) != 1L) {
  897. !         Fclose(fd);
  898. !         return -1;
  899. !     }
  900. ! 
  901. !     if (buf == '#') {
  902. !         if (Fread(fd, 1L, &buf) != 1L) {
  903. !             Fclose(fd);
  904. !             return -1;
  905. !         }
  906. ! 
  907. !         if (buf == '!') {
  908. ! 
  909. !             /* skip blanks */
  910. !             do {
  911. !                 if (Fread(fd, 1L, &buf) != 1L) {
  912. !                     Fclose(fd);
  913. !                     return -1;
  914. !                 }
  915. !             } while (buf == ' ' || buf == '\t');
  916. ! 
  917. !             /* read filename */
  918. !             for (i = 0; i < MAXPATHLEN; i++) {
  919. !                 if (buf == ' ' || buf == '\t' ||
  920. !                         buf == '\r' || buf == '\n')
  921. !                     break;
  922. !                 shellpath[i] = buf;
  923. ! 
  924. !                 if (Fread(fd, 1L, &buf) != 1L) {
  925. !                     Fclose(fd);
  926. !                     return -1;
  927. !                 }
  928. !             }
  929. !             shellpath[i] = '\0';
  930. !             shell = shellpath;
  931. ! 
  932. !             /* 
  933. !              * read arguments if any
  934. !              * maximum is TOS_ARGS (only restricted for my comfort :-)
  935. !              */
  936. !             nargcount = 0;
  937. !             i = 0;
  938. !             while(i < TOS_ARGS && buf != '\r' && buf != '\n') {
  939. !                 /* skip blanks */
  940. !                 do {
  941. !                     if (Fread(fd, 1L, &buf) != 1L) {
  942. !                         Fclose(fd);
  943. !                         return -1;
  944. !                     }
  945. !                 } while (buf == ' ' || buf == '\t');
  946. ! 
  947. !                 if (buf == '\r' || buf == '\n')
  948. !                     break;
  949. !                 
  950. !                 while ( buf != ' '  && buf != '\t' &&
  951. !                         buf != '\r' && buf != '\n' && i < TOS_ARGS) {
  952. !                     args[i++] = buf;
  953. !                     if (Fread(fd, 1L, &buf) != 1L) {
  954. !                         Fclose(fd);
  955. !                         return -1;
  956. !                     }
  957. !                 }
  958. !                 args[i++] = '\0';
  959. !                 nargcount++;
  960. !             }
  961. !             args[i] = '\0';
  962. !             shellargs    = args;
  963. !         }
  964. !         else {
  965. !             shell = "/bin/sh";
  966. !             nargcount = 0;
  967. !             args[0] = '\0';
  968. !             shellargs = args;
  969. !         }
  970. ! 
  971. !         Fclose(fd);
  972.           
  973. !         if (*shell) {
  974. ! 
  975. !             shell = buffindfile(shell, getenv("PATH"), extensions, tmppath);
  976. !             if (!shell) {
  977. !                 errno = ENOENT;
  978. !                 return -1;        /* file not found */
  979. !             }
  980. ! 
  981. !             /* count old args */
  982. !             for (i = 0; argv[i] != 0; i++);
  983. !             argcount = i;
  984. !             
  985. !             shellargv = (char **)Malloc((argcount + nargcount + 2) * sizeof(char *));
  986. !             if (!shellargv) {
  987. !                 errno = ENOMEM;
  988. !                 return -1;
  989. !             }
  990. !             
  991. !             i = 0;
  992. !             shellargv[i++] = shell;
  993. !             while(*shellargs != '\0') {
  994. !                 shellargv[i++] = shellargs;
  995. !                 while (*shellargs++ != '\0');
  996. !             }
  997. !     
  998. !             while (*argv != NULL)
  999. !                 shellargv[i++] = *argv++;
  1000. !             shellargv[i] = NULL;
  1001. !             
  1002. !             rv = _spawnve(mode, shell, shellargv, envp);
  1003. !             (void)Mfree(shellargv);
  1004. !             return rv;
  1005. !         }
  1006. !     }
  1007.   
  1008.       return -1;
  1009.   }
  1010.   
  1011. --- 79,180 ----
  1012.       int        fd;
  1013.       int        argcount;
  1014.       int        i, rv;
  1015. !     char buf[1024], *bufp, *argp;
  1016. !     long r;
  1017. ! 
  1018.       /* path is already converted to dos */
  1019.       if ((fd = (int)Fopen(path, 0)) < 0)
  1020. !       {
  1021. !         errno = -fd;
  1022. !         return -1;
  1023. !       }
  1024. ! 
  1025. !     r = Fread (fd, (long) sizeof (buf) - 1L, buf);
  1026. !     Fclose (fd);
  1027. !     if (r < 0)
  1028. !       {
  1029. !         errno = -(int) r;
  1030. !         return -1;
  1031. !       }
  1032. !     buf[r] = 0;
  1033. ! 
  1034. !     if (buf[0] == '#' && buf[1] == '!')
  1035. !       {
  1036. !         /* skip blanks */
  1037. !         bufp = buf + 2;
  1038. !         while (*bufp == '\t' || *bufp == ' ')
  1039. !           bufp++;
  1040. ! 
  1041. !         /* read filename */
  1042. !         shell = bufp;
  1043. !         while (*bufp && *bufp != ' ' && *bufp != '\t'
  1044. !            && *bufp != '\r' && *bufp != '\n')
  1045. !           bufp++;
  1046. ! 
  1047. !         if (*bufp && *bufp != '\r' && *bufp != '\n')
  1048. !           *bufp++ = 0;
  1049. !         /* else the null will be added below */
  1050. ! 
  1051. !         /* 
  1052. !          * read arguments if any
  1053. !          */
  1054. !         argp = shellargs = bufp;
  1055. !         nargcount = 0;
  1056. !         i = 0;
  1057. !         while (*bufp && *bufp != '\r' && *bufp != '\n')
  1058. !           {
  1059. !         /* skip blanks */
  1060. !         while (*bufp == ' ' || *bufp == '\t')
  1061. !           bufp++;
  1062. ! 
  1063. !         if (*bufp == '\r' || *bufp == '\n')
  1064. !           break;
  1065. ! 
  1066. !         while (*bufp && *bufp != ' ' && *bufp != '\t'
  1067. !                && *bufp != '\r' && *bufp != '\n')
  1068. !           *argp++ = *bufp++;
  1069. !         *argp++ = '\0';
  1070. !         nargcount++;
  1071. !           }
  1072. !         *argp = '\0';
  1073.           
  1074. !         if (*shell)
  1075. !           {
  1076. !         shell = buffindfile (shell, getenv("PATH"), extensions, tmppath);
  1077. !         if (!shell)
  1078. !           {
  1079. !             errno = ENOENT;
  1080. !             return -1;    /* file not found */
  1081. !           }
  1082. ! 
  1083. !         /* count old args */
  1084. !         for (i = 0; argv[i] != 0; i++);
  1085. !         argcount = i;
  1086. ! 
  1087. !         shellargv = (char **)Malloc((argcount + nargcount + 2) * sizeof(char *));
  1088. !         if (!shellargv) {
  1089. !           errno = ENOMEM;
  1090. !           return -1;
  1091. !         }
  1092. ! 
  1093. !         i = 0;
  1094. !         shellargv[i++] = shell;
  1095. !         while(*shellargs != '\0') {
  1096. !           shellargv[i++] = shellargs;
  1097. !           while (*shellargs++ != '\0');
  1098. !         }
  1099. ! 
  1100. !         while (*argv != NULL)
  1101. !           shellargv[i++] = *argv++;
  1102. !         shellargv[i] = NULL;
  1103. ! 
  1104. !         rv = _spawnve(mode, shell, shellargv, envp);
  1105. !         (void)Mfree(shellargv);
  1106. !         return rv;
  1107. !           }
  1108. !       }
  1109.   
  1110. +     errno = ENOEXEC;
  1111.       return -1;
  1112.   }
  1113.   
  1114. ***************
  1115. *** 219,226 ****
  1116.       size_t len, cnt;
  1117.       int i, done;
  1118.   #ifdef HASH_BANG
  1119. !     char        **_envp;
  1120. !     char        **_argv;
  1121.   #endif
  1122.   
  1123.       if (mode != P_WAIT && mode != P_OVERLAY && mode != P_NOWAIT) {
  1124. --- 200,207 ----
  1125.       size_t len, cnt;
  1126.       int i, done;
  1127.   #ifdef HASH_BANG
  1128. !     char *const *_envp;
  1129. !     char *const *_argv;
  1130.   #endif
  1131.   
  1132.       if (mode != P_WAIT && mode != P_OVERLAY && mode != P_NOWAIT) {
  1133. ***************
  1134. *** 490,499 ****
  1135.   
  1136.       if (rval < 0)
  1137.       {
  1138. -         errno = (int) -rval;
  1139. -         rval = -1;
  1140.   #ifdef HASH_BANG
  1141. !         if (errno == ENOEXEC) {
  1142.               char    *umode;
  1143.   
  1144.                /* try to find UNIXMODE in environment */
  1145. --- 471,478 ----
  1146.   
  1147.       if (rval < 0)
  1148.       {
  1149.   #ifdef HASH_BANG
  1150. !         if (rval == -ENOEXEC) {
  1151.               char    *umode;
  1152.   
  1153.                /* try to find UNIXMODE in environment */
  1154. ***************
  1155. *** 504,509 ****
  1156. --- 483,490 ----
  1157.               }
  1158.           }
  1159.   #endif
  1160. +         errno = (int) -rval;
  1161. +         rval = -1;
  1162.       }
  1163.       else if (mode == P_OVERLAY)
  1164.       /* note that we get here only if MiNT is not active! */
  1165. Only in .: truncate.c
  1166. diff -cr ../mntlib35/ttyname.c ./ttyname.c
  1167. *** ../mntlib35/ttyname.c    Sat Jun 19 10:39:30 1993
  1168. --- ./ttyname.c    Tue Sep 21 10:05:46 1993
  1169. ***************
  1170. *** 8,16 ****
  1171.   #include <stdio.h>
  1172.   #include <types.h>
  1173.   #include <stat.h>
  1174. - #include <dirent.h>
  1175.   #include <string.h>
  1176.   #include <unistd.h>
  1177.   
  1178.   extern int __mint;
  1179.   
  1180. --- 8,20 ----
  1181.   #include <stdio.h>
  1182.   #include <types.h>
  1183.   #include <stat.h>
  1184.   #include <string.h>
  1185.   #include <unistd.h>
  1186. + #include <mintbind.h>
  1187. + #include <limits.h>
  1188. + #include <errno.h>
  1189. + #include <ioctl.h>
  1190. + #include "lib.h"
  1191.   
  1192.   extern int __mint;
  1193.   
  1194. ***************
  1195. *** 20,26 ****
  1196.   
  1197.   /* Find the file in directory "dir" that matches "sbuf". Returns 1
  1198.    * on success, 0 on failure. Note that "dir" is a prefix, i.e. it
  1199. !  * should end with "/".
  1200.    */
  1201.   
  1202.   static int
  1203. --- 24,30 ----
  1204.   
  1205.   /* Find the file in directory "dir" that matches "sbuf". Returns 1
  1206.    * on success, 0 on failure. Note that "dir" is a prefix, i.e. it
  1207. !  * should end with "\\".
  1208.    */
  1209.   
  1210.   static int
  1211. ***************
  1212. *** 29,57 ****
  1213.       struct stat *sb;
  1214.       char *name;
  1215.   {
  1216. !     char *where = name;
  1217. !     DIR *drv;
  1218. !     struct dirent *next;
  1219.       struct stat testsb;
  1220.   
  1221. !     drv = opendir(dir);
  1222. !     if (!drv) return 0;
  1223.   
  1224.       while (*dir) {
  1225.           *where++ = *dir++;
  1226.       }
  1227.   
  1228. !     while ((next = readdir(drv)) != NULL) {
  1229. !         strcpy(where, next->d_name);
  1230. !         if (stat(name, &testsb))
  1231.               continue;
  1232.           if (testsb.st_dev == sb->st_dev &&
  1233.               testsb.st_ino == sb->st_ino) {
  1234. !             closedir(drv);
  1235.               return 1;
  1236.           }
  1237.       }
  1238. !     closedir(drv);
  1239.       return 0;
  1240.   }
  1241.   
  1242. --- 33,66 ----
  1243.       struct stat *sb;
  1244.       char *name;
  1245.   {
  1246. !     char _name[PATH_MAX];
  1247. !     char *where = _name;
  1248. !     long drv;
  1249.       struct stat testsb;
  1250. +     struct dbuf {
  1251. +         long ino;
  1252. +         char name[NAME_MAX + 1];
  1253. +     } dbuf;
  1254.   
  1255. !     drv = Dopendir (dir, 0);
  1256. !     if ((drv & 0xff000000L) == 0xff000000L) return 0;
  1257.   
  1258.       while (*dir) {
  1259.           *where++ = *dir++;
  1260.       }
  1261.   
  1262. !     while (Dreaddir((int) sizeof (dbuf), drv, &dbuf) == 0) {
  1263. !         strcpy(where, dbuf.name);
  1264. !         if (Fxattr(0, _name, &testsb))
  1265.               continue;
  1266.           if (testsb.st_dev == sb->st_dev &&
  1267.               testsb.st_ino == sb->st_ino) {
  1268. !             Dclosedir(drv);
  1269. !             _dos2unx (_name, name);
  1270.               return 1;
  1271.           }
  1272.       }
  1273. !     Dclosedir(drv);
  1274.       return 0;
  1275.   }
  1276.   
  1277. ***************
  1278. *** 74,88 ****
  1279.           return tname;
  1280.       }
  1281.   
  1282. !     if (fstat(fd, &sb))
  1283.           return (char *)0;
  1284.   
  1285.       /* try the devices first */
  1286. !     if (find_ino("/dev/", &sb, tname))
  1287.           return tname;
  1288.   
  1289.       /* hmmm, maybe we're a pseudo-tty */
  1290. !     if (find_ino("u:/pipe/", &sb, tname))
  1291.           return tname;
  1292.   
  1293.       /* I give up */
  1294. --- 83,97 ----
  1295.           return tname;
  1296.       }
  1297.   
  1298. !     if (Fcntl(fd, &sb, FSTAT))
  1299.           return (char *)0;
  1300.   
  1301.       /* try the devices first */
  1302. !     if (find_ino("u:\\dev\\", &sb, tname))
  1303.           return tname;
  1304.   
  1305.       /* hmmm, maybe we're a pseudo-tty */
  1306. !     if (find_ino("u:\\pipe\\", &sb, tname))
  1307.           return tname;
  1308.   
  1309.       /* I give up */
  1310. diff -cr ../mntlib35/utime.c ./utime.c
  1311. *** ../mntlib35/utime.c    Wed Sep  8 14:57:32 1993
  1312. --- ./utime.c    Tue Sep 21 10:10:06 1993
  1313. ***************
  1314. *** 55,61 ****
  1315.         const struct utimbuf *tset;
  1316.   {
  1317.       int fh;
  1318. !     time_t actime, modtime;
  1319.       unsigned long dtime;    /* dos time equivalent */
  1320.       
  1321.       char filename[PATH_MAX];
  1322. --- 55,61 ----
  1323.         const struct utimbuf *tset;
  1324.   {
  1325.       int fh;
  1326. !     unsigned long actime, modtime;
  1327.       unsigned long dtime;    /* dos time equivalent */
  1328.       
  1329.       char filename[PATH_MAX];
  1330. ***************
  1331. *** 64,86 ****
  1332.   
  1333.       if (tset)
  1334.       {
  1335. !         modtime = tset->modtime;
  1336. !         actime = tset->actime;
  1337.       }
  1338.       else
  1339.       {
  1340. !         time(&actime);
  1341.           modtime = actime;
  1342.       }
  1343.   
  1344.       (void)_unx2dos(_filename, filename);
  1345.   
  1346. !     dtime = _dostime(actime);
  1347. !     settime.actime = (unsigned short) ((dtime >> 16) & 0xFFFF);
  1348. !     settime.acdate = (unsigned short) (dtime & 0xFFFF);
  1349. !     dtime = _dostime(modtime);
  1350. !     settime.modtime = (unsigned short) ((dtime >> 16) & 0xFFFF);
  1351. !     settime.moddate = (unsigned short) (dtime & 0xFFFF);
  1352.       fh = (int) Fopen(filename, 2);
  1353.       if (fh < 0) {
  1354.           errno = -fh;
  1355. --- 64,84 ----
  1356.   
  1357.       if (tset)
  1358.       {
  1359. !         modtime = _dostime (tset->modtime);
  1360. !         actime = _dostime (tset->actime);
  1361.       }
  1362.       else
  1363.       {
  1364. !         actime = ((long) Tgettime () << 16) | (Tgetdate () & 0xFFFF);
  1365.           modtime = actime;
  1366.       }
  1367.   
  1368.       (void)_unx2dos(_filename, filename);
  1369.   
  1370. !     settime.actime = (unsigned short) ((actime >> 16) & 0xFFFF);
  1371. !     settime.acdate = (unsigned short) (actime & 0xFFFF);
  1372. !     settime.modtime = (unsigned short) ((modtime >> 16) & 0xFFFF);
  1373. !     settime.moddate = (unsigned short) (modtime & 0xFFFF);
  1374.       fh = (int) Fopen(filename, 2);
  1375.       if (fh < 0) {
  1376.           errno = -fh;
  1377. ***************
  1378. *** 95,101 ****
  1379. --- 93,102 ----
  1380.               res = Fcntl(fh, (long)0, FUTIME);
  1381.       }
  1382.       if (res == -EINVAL)
  1383. +           {
  1384. +         dtime = modtime;
  1385.           (void)Fdatime((_DOSTIME *) &dtime, fh, 1);
  1386. +           }
  1387.   
  1388.       if ((fh = Fclose(fh)) != 0) {
  1389.           errno = -fh;
  1390. ***************
  1391. *** 109,114 ****
  1392. --- 110,116 ----
  1393.   {
  1394.       unsigned long dtime;
  1395.       unsigned date, time;
  1396. +     long r;
  1397.   
  1398.       assert(t != 0);
  1399.       dtime = _dostime(*t);
  1400. ***************
  1401. *** 115,122 ****
  1402.       date = (int) (dtime & 0xffff);
  1403.       time = (int) (dtime >> 16) & 0xffff;
  1404.   
  1405. !     if (Tsetdate(date) || Tsettime(time)) {
  1406. !         errno = EBADARG;
  1407.           return -1;
  1408.       }
  1409.       return 0;
  1410. --- 117,124 ----
  1411.       date = (int) (dtime & 0xffff);
  1412.       time = (int) (dtime >> 16) & 0xffff;
  1413.   
  1414. !     if ((r = Tsetdate(date)) || (r = Tsettime(time))) {
  1415. !         errno = r == -1 ? EBADARG : (int) -r;
  1416.           return -1;
  1417.       }
  1418.       return 0;
  1419. Only in .: vfprintf.c
  1420. Only in .: vprintf.c
  1421. diff -cr ../mntlib35/waitpid.c ./waitpid.c
  1422. *** ../mntlib35/waitpid.c    Mon Sep 13 06:58:12 1993
  1423. --- ./waitpid.c    Sat Sep 18 02:47:54 1993
  1424. ***************
  1425. *** 22,29 ****
  1426.       long r;
  1427.       int exit_status, sig_term;
  1428.       union wait *statwait;
  1429.       int *status = _status.__wi;
  1430. !     
  1431.       statwait = (union wait *) status;
  1432.       if (__mint == 0) {
  1433.           r = __waitval;
  1434. --- 22,33 ----
  1435.       long r;
  1436.       int exit_status, sig_term;
  1437.       union wait *statwait;
  1438. + #ifdef __GNUC__
  1439.       int *status = _status.__wi;
  1440. ! #else
  1441. !     int *status = _status;
  1442. ! #endif    
  1443. ! 
  1444.       statwait = (union wait *) status;
  1445.       if (__mint == 0) {
  1446.           r = __waitval;
  1447. Only in .: wcmb.c
  1448. *** /dev/null    Wed Sep 22 15:23:54 1993
  1449. --- nlist.c    Sun Jul 18 15:00:32 1993
  1450. ***************
  1451. *** 0 ****
  1452. --- 1,153 ----
  1453. + /* nlist for mintlib/toslib.
  1454. +  * Written by S.N. Henson and released into the public domain.
  1455. +  *
  1456. +  * Currently uses just standard and GST extended symbol formats.
  1457. +  */
  1458. + 
  1459. + #include <st-out.h>
  1460. + #include <fcntl.h>
  1461. + #include <unistd.h>
  1462. + #include <errno.h>
  1463. + #include <macros.h>
  1464. + #include <nlist.h>
  1465. + #include <string.h>
  1466. + 
  1467. + #define SYM_BUFSIZE 100
  1468. + #define SYMSIZE sizeof(struct asym)
  1469. + #define GSYM_SIZE 23
  1470. + 
  1471. + static int sym_fd;
  1472. + 
  1473. + static long symcount;
  1474. + 
  1475. + static int getsym __PROTO((struct asym *sptr));
  1476. + 
  1477. + /* Read a symbol from a file and put it in sptr */
  1478. + static int getsym(sptr)
  1479. + struct asym *sptr;
  1480. + {
  1481. +     static struct asym symbuf[SYM_BUFSIZE],*symptr;
  1482. +     static long symread;
  1483. +     if( !symread )
  1484. +     {
  1485. +         symread=min(sizeof(symbuf),symcount);
  1486. +         if(symread!=read(sym_fd,symbuf,symread))
  1487. +         {
  1488. +             close(sym_fd);
  1489. +                         symread=0;
  1490. +             errno=EREAD; /* Premature EOF */
  1491. +             return -1;
  1492. +         }
  1493. +         symptr=symbuf;
  1494. +     }
  1495. + 
  1496. +     *sptr=*symptr++;
  1497. +     symread-=SYMSIZE;
  1498. + 
  1499. +         if( symread < 0 )
  1500. +         {
  1501. +                 symread=0;
  1502. +                 errno=EREAD;
  1503. +                 return -1;
  1504. +         }
  1505. + 
  1506. +     return 0;
  1507. + }
  1508. + 
  1509. + int nlist(file,nl)
  1510. + char *file;
  1511. + struct nlist *nl;
  1512. + {
  1513. + 
  1514. +     struct nlist *p;
  1515. + 
  1516. +     struct aexec hbuf;
  1517. + 
  1518. +     struct asym sym;
  1519. + 
  1520. +     long nl_count;
  1521. + 
  1522. +     if(!file || !nl)
  1523. +     {
  1524. +         errno=EFAULT;
  1525. +         return -1;
  1526. +     }
  1527. + 
  1528. +     if( ( sym_fd=open(file,O_RDONLY) ) == -1 ) return -1;            
  1529. + 
  1530. +     /* Read in file header */
  1531. +     read(sym_fd,&hbuf,sizeof(hbuf));
  1532. + 
  1533. +     /* Executable file ? */
  1534. +     if(A_BADMAG(hbuf)) 
  1535. +     {
  1536. +         close(sym_fd);
  1537. +         errno=ENOEXEC;
  1538. +         return -1;
  1539. +     }
  1540. + 
  1541. +     /* Any symbols? */
  1542. +     if( !(symcount=hbuf.a_syms) )
  1543. +     {
  1544. +         errno=EDOM;
  1545. +         return -1;
  1546. +     }
  1547. + 
  1548. +     if( symcount < sizeof(struct asym) )
  1549. +     {
  1550. +         close(sym_fd);
  1551. +         errno=EREAD;
  1552. +         return -1;
  1553. +     }
  1554. + 
  1555. +     /* Seek to symbol table */
  1556. +     if( A_SYMOFF(hbuf)!=lseek(sym_fd,A_SYMOFF(hbuf),SEEK_SET) )
  1557. +     {
  1558. +         close(sym_fd);
  1559. +         errno=EREAD;
  1560. +         return -1;
  1561. +     }
  1562. + 
  1563. +     /* Count number of symbols to match */
  1564. +     for(p=nl,nl_count=0;p->n_name;p++)
  1565. +     {
  1566. +         nl_count++;
  1567. +         p->n_value=p->n_type=0;
  1568. +     }
  1569. + 
  1570. +     if(!nl_count) return 0;
  1571. + 
  1572. +     do
  1573. +     {
  1574. +         char name[GSYM_SIZE];
  1575. + 
  1576. +         /* Get one symbol from file */
  1577. +         if(getsym(&sym)) return -1;
  1578. + 
  1579. +         symcount-=SYMSIZE;
  1580. + 
  1581. +         strncpy(name,sym.a_name,8);
  1582. + 
  1583. +         /* If extended symbol, get rest of name */
  1584. +         if( (sym.a_type & A_LNAM) == A_LNAM)
  1585. +         {
  1586. +             if( (symcount <= 0) || getsym((struct asym *)(name+8)))
  1587. +                                       return -1;
  1588. +             symcount-=SYMSIZE;
  1589. +             name[22]=0;
  1590. +         }
  1591. +         else name[8]=0;
  1592. + 
  1593. +         /* Check for match */
  1594. +         for(p=nl;p->n_name;p++)
  1595. +         {
  1596. +             if(p->n_type || strcmp(name,p->n_name)) continue;
  1597. +             p->n_value=sym.a_value;
  1598. +             p->n_type=sym.a_type;
  1599. +             if(--nl_count==0) return 0;
  1600. +         }
  1601. +     }
  1602. +     while(symcount > 0);
  1603. + 
  1604. +     return nl_count;
  1605. + }
  1606. *** /dev/null    Wed Sep 22 15:24:08 1993
  1607. --- printf.c    Thu Sep 16 02:35:34 1993
  1608. ***************
  1609. *** 0 ****
  1610. --- 1,18 ----
  1611. + #include <stdio.h>
  1612. + #include <stdarg.h>
  1613. + #include "lib.h"
  1614. + 
  1615. + #if __STDC__
  1616. + int printf(const char *fmt, ...)
  1617. + #else
  1618. + int printf(fmt) const char *fmt;
  1619. + #endif
  1620. + {
  1621. +     va_list args;
  1622. +     int r;
  1623. + 
  1624. +     va_start(args, fmt);
  1625. +     r = _doprnt(stdout, fmt, args);
  1626. +     va_end(args);
  1627. +     return r;
  1628. + }
  1629. *** /dev/null    Wed Sep 22 15:24:18 1993
  1630. --- truncate.c    Tue Sep 21 20:24:34 1993
  1631. ***************
  1632. *** 0 ****
  1633. --- 1,80 ----
  1634. + /*
  1635. + 
  1636. + Here is an implementation of truncate/ftruncate for the MiNTlib. There
  1637. + is a special case for truncate, if the filesystem does not recognize
  1638. + FTRUNCATE and the length is zero, Fcreate is used to truncate the
  1639. + file. This only works for tosfs if the file isn't already open. The
  1640. + rest is quite straight forward.
  1641. + 
  1642. + Andreas.
  1643. + 
  1644. + Andreas Schwab <schwab@issan.informatik.uni-dortmund.de>
  1645. + 
  1646. + */
  1647. + 
  1648. + #include <compiler.h>
  1649. + #include <limits.h>
  1650. + #include <errno.h>
  1651. + #include <mintbind.h>
  1652. + #include <ioctl.h>
  1653. + #ifdef __TURBOC__
  1654. + #include <sys\types.h>
  1655. + #else
  1656. + #include <sys/types.h>
  1657. + #endif
  1658. + #include "lib.h"
  1659. + 
  1660. + extern int __mint;
  1661. + 
  1662. + int
  1663. + truncate (_filename, length)
  1664. +      const char *_filename;
  1665. +      off_t length;
  1666. + {
  1667. +   int fh, res;
  1668. +   char filename[PATH_MAX];
  1669. + 
  1670. +   (void) _unx2dos (_filename, filename);
  1671. +   fh = Fopen (filename, 2);
  1672. +   if (fh < 0)
  1673. +     {
  1674. +       errno = -fh;
  1675. +       return -1;
  1676. +     }
  1677. +   res = -EINVAL;
  1678. +   if (__mint > 90)
  1679. +     res = Fcntl (fh, (long) &length, FTRUNCATE);
  1680. +   Fclose (fh);
  1681. +   if (res == -EINVAL && length == 0)
  1682. +     {
  1683. +       res = Fcreate (filename, 0);
  1684. +       if (res >= 0)
  1685. +     Fclose (res);
  1686. +     }
  1687. +   if (res < 0)
  1688. +     {
  1689. +       errno = -res;
  1690. +       return -1;
  1691. +     }
  1692. +   return 0;
  1693. + }
  1694. + 
  1695. + int
  1696. + ftruncate (fd, length)
  1697. +      int fd;
  1698. +      off_t length;
  1699. + {
  1700. +   int res;
  1701. + 
  1702. +   if (__mint > 90)
  1703. +     res = Fcntl (fd, (long) &length, FTRUNCATE);
  1704. +   else
  1705. +     res = -EINVAL;
  1706. + 
  1707. +   if (res < 0)
  1708. +     {
  1709. +       errno = -res;
  1710. +       return -1;
  1711. +     }
  1712. +   return 0;
  1713. + }
  1714. *** /dev/null    Wed Sep 22 15:24:30 1993
  1715. --- vfprintf.c    Thu Sep 16 02:35:34 1993
  1716. ***************
  1717. *** 0 ****
  1718. --- 1,13 ----
  1719. + #include <stdio.h>
  1720. + #include <stdarg.h>
  1721. + #include "lib.h"
  1722. + 
  1723. + 
  1724. + int
  1725. + vfprintf(fp, fmt, args)
  1726. +     FILE *fp;
  1727. +     const char *fmt;
  1728. +     va_list args;
  1729. + {
  1730. +     return(_doprnt(fp, fmt, args));
  1731. + }
  1732. *** /dev/null    Wed Sep 22 15:24:54 1993
  1733. --- vprintf.c    Thu Sep 16 02:35:34 1993
  1734. ***************
  1735. *** 0 ****
  1736. --- 1,10 ----
  1737. + #include <stdio.h>
  1738. + #include <stdarg.h>
  1739. + #include "lib.h"
  1740. + int
  1741. + vprintf(fmt, args)
  1742. +     const char *fmt;
  1743. +     va_list args;
  1744. + {
  1745. +     return(_doprnt(stdout, fmt, args));
  1746. + }
  1747. *** /dev/null    Wed Sep 22 15:24:40 1993
  1748. --- wcmb.c    Tue Sep 21 09:04:18 1993
  1749. ***************
  1750. *** 0 ****
  1751. --- 1,79 ----
  1752. + /* This implements the wc* and mb* ANSI/ISO functions.
  1753. +    They're in the "DUMB" locale ;), and in the public domain.
  1754. + */
  1755. + 
  1756. + #include <stdlib.h>
  1757. + #include <stddef.h>
  1758. + 
  1759. + int
  1760. + mblen(mbstr, n)
  1761. + const char *mbstr;
  1762. + size_t n;
  1763. + {
  1764. +     /* Locale test: no shift states. */
  1765. +     if(mbstr == NULL) return 0;
  1766. +     
  1767. +     if(*mbstr == '\0' || n == 0) return 0;
  1768. +     
  1769. +     /* There are no multibytesequences... */
  1770. +     return 1;
  1771. + }
  1772. + 
  1773. + size_t
  1774. + mbstowcs(wstr, mbstr, maxlen)
  1775. + wchar_t *wstr;
  1776. + const char *mbstr;
  1777. + size_t maxlen;
  1778. + {
  1779. +     size_t revcnt = maxlen;
  1780. +     
  1781. +     if(mbstr == NULL) mbstr = "";
  1782. +     
  1783. +     while(revcnt && (*wstr++ = *mbstr++)) revcnt--;
  1784. +     
  1785. +     return maxlen - revcnt;
  1786. + }
  1787. + 
  1788. + int
  1789. + mbtowc(wstr, mbstr, n)
  1790. + wchar_t *wstr;
  1791. + const char *mbstr;
  1792. + size_t n;
  1793. + {
  1794. +     /* Locale test: no shift states. */
  1795. +     if(mbstr == NULL) return 0;
  1796. +     
  1797. +     if(*mbstr == '\0' || n == 0) return 0;
  1798. +     
  1799. +     if(wstr != NULL) *wstr = *mbstr;
  1800. +     return 1;
  1801. + }
  1802. + 
  1803. + 
  1804. + size_t
  1805. + wcstombs(mbstr, wstr, maxlen)
  1806. + char *mbstr;
  1807. + const wchar_t *wstr;
  1808. + size_t maxlen;
  1809. + {
  1810. +     size_t revcnt = maxlen;
  1811. +     static const wchar_t wnull[1] = { 0 };
  1812. +     
  1813. +     if(wstr == NULL) wstr = wnull; /* Better avoid L"". */
  1814. +     
  1815. +     while(revcnt && (*mbstr++ = (char) *wstr++)) revcnt--;
  1816. +     
  1817. +     return maxlen - revcnt;
  1818. + }
  1819. + 
  1820. + int
  1821. + wctomb(mbstr, wchar)
  1822. + char *mbstr;
  1823. + wchar_t wchar;
  1824. + {
  1825. +     /* Nope, still no statedependencies. */
  1826. +     if(mbstr == NULL) return 0;
  1827. +     
  1828. +     *mbstr = (char) wchar;
  1829. +     return 1;
  1830. + }
  1831.